Comment change.

diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index a0cdc96e26424790417bb33c557fc318937ca35f..bd654a48668e4f57bcb93c5f2cefdcdd176fa877 100644 (file)
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -582,6 +582,9 @@ This is in addition to the primary selection.")
 ;;; Return the value of the current X selection.
 ;;; Consult the selection, then the cut buffer.  Treat empty strings
 ;;; as if they were unset.
+;;; If this function is called twice and finds the same text,
+;;; it returns nil the second time.  This is so that a single
+;;; selection won't be added to the kill ring over and over.
 (defun x-cut-buffer-or-selection-value ()
   (let (text)